Delphi Programmer's Power Pack/Delphi Volume 1.iso/s_to_z/tbarco16/barfrm16.dfm/barfrm16.txt

Text File | 1996-09-15 | 3KB | 160 lines

object DemoForm: TDemoForm
  Left = 66
  Top = 43
  Width = 517
  Height = 428
  Caption = 'TBarcode'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  OnPaint = FormPaint
  TextHeight = 16
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 80
    Height = 16
    Caption = 'Bar_Caption'
  end
  object Label2: TLabel
    Left = 216
    Top = 8
    Width = 122
    Height = 16
    Caption = 'Bar_HeightPercent'
  end
  object Barcode1: TBarcode
    Left = 216
    Top = 156
    Width = 68
    Height = 65
    Hint = 'Exit program'
    Bar_Caption = '12345'
    Bar_HighDensity = False
    Bar_ModuleWidth = SC2
    Bar_WidthReduce = False
    Bar_ZoomSize = False
    Code_License = 'Not registered'
    Code_Version = 'v1.00'
  end
  object RGCodetyp: TRadioGroup
    Left = 16
    Top = 64
    Width = 169
    Height = 137
    Caption = 'Bar_Codetyp'
    ItemIndex = 0
    Items.Strings = (
      'EAN-8'
      'EAN-13'
      'UPC-A'
      'UPC-E'
      'Code 39'
      'Code 2/5 interleaved'
      'Code 2/5i (Frachtpost)')
    TabOrder = 2
    OnClick = RGCodetypClick
  end
  object CB_ZoomSize: TCheckBox
    Left = 212
    Top = 100
    Width = 149
    Height = 17
    Caption = 'Bar_ZoomSize'
    TabOrder = 4
    OnClick = CB_ZoomSizeClick
  end
  object CB_HighDensity: TCheckBox
    Left = 212
    Top = 72
    Width = 149
    Height = 21
    Caption = 'Bar_HighDensity'
    TabOrder = 6
    OnClick = CB_HighDensityClick
  end
  object CB_WidthReduce: TCheckBox
    Left = 212
    Top = 124
    Width = 141
    Height = 17
    Caption = 'Bar_WidthReduce'
    TabOrder = 1
    OnClick = CB_WidthReduceClick
  end
  object Edit1: TEdit
    Left = 20
    Top = 28
    Width = 165
    Height = 24
    TabOrder = 3
    Text = 'Edit1'
    OnChange = Edit1Change
  end
  object SE_HeightPerCent: TSpinEdit
    Left = 216
    Top = 28
    Width = 121
    Height = 26
    EditorEnabled = False
    Increment = 5
    MaxValue = 200
    MinValue = 20
    TabOrder = 5
    Value = 20
    OnChange = SE_HeightPerCentChange
  end
  object RGModulewidth: TRadioGroup
    Left = 16
    Top = 208
    Width = 169
    Height = 129
    Caption = 'Bar_ModuleWidth'
    Columns = 2
    ItemIndex = 2
    Items.Strings = (
      'SC0'
      'SC1'
      'SC2'
      'SC3'
      'SC4'
      'SC5'
      'SC6'
      'SC7'
      'SC8'
      'SC9')
    TabOrder = 0
    OnClick = RGModulewidthClick
  end
  object PrintBtn1: TBitBtn
    Left = 376
    Top = 24
    Width = 113
    Height = 29
    Caption = 'Print &1'
    TabOrder = 8
    OnClick = PrintBtn1Click
  end
  object PrintBtn2: TBitBtn
    Left = 376
    Top = 60
    Width = 113
    Height = 29
    Caption = 'Print &2'
    TabOrder = 7
  end
  object ExitBtn: TButton
    Left = 376
    Top = 100
    Width = 113
    Height = 29
    Caption = 'Exit'
    TabOrder = 9
    OnClick = ExitBtnClick
  end
end